(concat): Don't convert 7-bit ASCII characters via

nonascii-translation-table.

diff --git a/src/fns.c b/src/fns.c
index 76455feb10efbb0745b75955c99b0d7804d41338..53f980c1e9747d7e9635dae01af34a9edd1ed1b2 100644 (file)
--- a/src/fns.c
+++ b/src/fns.c
@@ -711,7 +711,8 @@ concat (nargs, args, target_type, last_special)
                    XSETFASTINT (elt, XSTRING (this)->data[thisindex++]);
                    if (some_multibyte
                        && (XINT (elt) >= 0240
-                           || ! NILP (Vnonascii_translation_table))
+                           || (XINT (elt) >= 0200
+                               && ! NILP (Vnonascii_translation_table)))
                        && XINT (elt) < 0400)
                      {
                        c = unibyte_char_to_multibyte (XINT (elt));